#数据库例子

#安装包
install.packages("RMySQL")

#连接数据库
con <- dbConnect(MySQL(), 
                 host='127.0.0.1',
                 user='root', 
                 password='passw0rd',
                 dbname='world')

#查询数据
city <- dbGetQuery(con, "select * from city")

# 关闭数据库连接
dbDisconnect(con)









